home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Eagles Nest BBS 1
/
Eagles_Nest_Mac_Collection_Disc_1.TOAST
/
System & Related
/
UNIXNut#2
/
Shells
/
background_14368.txt
< prev
next >
Wrap
Text File
|
1989-06-08
|
5KB
|
241 lines
-- background: 14368 from stack: in
-- bmap block id: 7085
-- flags: 0000
-- background id: 0
-- name: Bourne
----- HyperTalk script -----
on openBackground
global menu2
checkmenu menu2,1,true
end openBackground
on closeBackground
global menu2
checkmenu menu2,1,false
end closeBackground
on mouseUp
if the target contains "field" then
getKey
end if
end mouseUp
-- part 7 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=27 top=22 right=41 bottom=246
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 8 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=25 top=69 right=325 bottom=472
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 20
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name:
-- part 11 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=478 top=276 right=306 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 3061 / 3061
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: ReturnToMark
----- HyperTalk script -----
on mouseUp
returnToMark
end mouseUp
-- part 12 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=475 top=129 right=153 bottom=510
-- title width / last selected line: 0
-- icon id / first selected line: 6724 / 6724
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: arrowNext
----- HyperTalk script -----
on mouseDown
arrowNext
end mouseDown
-- part 13 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=476 top=89 right=118 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 4895 / 4895
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: arrowPrev
----- HyperTalk script -----
on mouseDown
arrowPrev
end mouseDown
-- part 9 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=475 top=108 right=135 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 21
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
topicCardSeek
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=477 top=243 right=269 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 7417 / 7417
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Back
----- HyperTalk script -----
on mouseUp
go back
end mouseUp
-- part 16 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=12 top=18 right=41 bottom=28
-- title width / last selected line: 0
-- icon id / first selected line: 27475 / 27475
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Skip Ahead
----- HyperTalk script -----
on mouseUp
get field 1
set lockScreen to true
repeat
go to next card of this background
if field 1 is not it then exit repeat
end repeat
end mouseUp
-- part 17 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=476 top=21 right=66 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 14609 / 14609
-- text alignment: 1
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Bourne
----- HyperTalk script -----
on mouseUp
visual effect wipe up
go to card id 3109
end mouseUp
-- part 19 (button)
-- low flags: 00
-- high flags: 0002
-- rect: left=475 top=172 right=210 bottom=510
-- title width / last selected line: 0
-- icon id / first selected line: 23090 / 23090
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
goSearch
end mouseUp
-- part 20 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=81 top=43 right=60 bottom=266
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 22 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=278 top=24 right=57 bottom=472
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 20
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Links
----- HyperTalk script -----
on mouseUp
golink
end mouseUp